object fFirma: TfFirma Left = 302 Top = 190 BorderIcons = [] BorderStyle = bsSingle Caption = 'Dane firmy' ClientHeight = 453 ClientWidth = 547 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = True Position = poScreenCenter OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 16 Top = 16 Width = 147 Height = 13 Caption = 'Nazwa firmy ( Nazwisko i imi'#281'): ' end object Label2: TLabel Left = 16 Top = 40 Width = 95 Height = 13 Caption = 'Nazwa dodatkowa :' end object l7: TLabel Left = 16 Top = 224 Width = 36 Height = 13 Caption = 'Telefon' end object Label7: TLabel Left = 16 Top = 256 Width = 23 Height = 13 Caption = 'Fax :' end object Label8: TLabel Left = 360 Top = 160 Width = 24 Height = 13 Caption = 'NIP :' end object Label9: TLabel Left = 352 Top = 184 Width = 34 Height = 13 Caption = 'PESEL' end object Label10: TLabel Left = 216 Top = 224 Width = 66 Height = 13 Caption = 'Nazwa banku' end object Label11: TLabel Left = 216 Top = 256 Width = 67 Height = 13 Caption = 'Numer konta :' end object Label12: TLabel Left = 16 Top = 288 Width = 51 Height = 13 Caption = 'Typ VAT : ' end object Label13: TLabel Left = 16 Top = 344 Width = 30 Height = 13 Caption = 'Uwagi' end object Label6: TLabel Left = 256 Top = 296 Width = 74 Height = 13 Caption = 'Nazwa cennika' end object Label14: TLabel Left = 16 Top = 320 Width = 43 Height = 13 Caption = 'P'#322'atno'#347#263 end object Label15: TLabel Left = 280 Top = 320 Width = 29 Height = 13 Caption = 'Rabat' end object Label16: TLabel Left = 16 Top = 64 Width = 58 Height = 13 Caption = 'Skr'#243't nazwy' end object eNazwa: TEdit Left = 168 Top = 8 Width = 369 Height = 21 MaxLength = 50 TabOrder = 0 end object eDod: TEdit Left = 168 Top = 32 Width = 369 Height = 21 MaxLength = 50 TabOrder = 1 end object gbAdr: TGroupBox Left = 8 Top = 96 Width = 337 Height = 113 Caption = 'Adres firmy' TabOrder = 3 object Label3: TLabel Left = 8 Top = 88 Width = 37 Height = 13 Caption = 'Miasto :' end object Label5: TLabel Left = 48 Top = 16 Width = 73 Height = 13 Caption = 'Kod pocztowy :' end object Label4: TLabel Left = 64 Top = 40 Width = 117 Height = 13 Caption = 'Ulica/wie'#347' - numer domu' end object eMiasto: TEdit Left = 56 Top = 80 Width = 233 Height = 21 MaxLength = 30 TabOrder = 4 end object eUlica: TEdit Left = 56 Top = 56 Width = 233 Height = 21 MaxLength = 50 TabOrder = 3 end object cbUl: TComboBox Left = 8 Top = 56 Width = 41 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 2 end object bUstaw: TButton Left = 224 Top = 16 Width = 89 Height = 20 Hint = 'Ustaw miejscowo'#347#263' wg kodu' Caption = 'Ust. m. wg kodu' ParentShowHint = False ShowHint = True TabOrder = 1 OnClick = bUstawClick end object bKod: TButton Left = 296 Top = 80 Width = 33 Height = 20 Hint = 'Ustal kod pocztowy' Caption = 'Ust.' ParentShowHint = False ShowHint = True TabOrder = 5 OnClick = bKodClick end object eKod_p: TMaskEdit Left = 128 Top = 8 Width = 41 Height = 21 EditMask = '00-000;1;_' MaxLength = 6 TabOrder = 0 Text = ' - ' OnExit = eKod_pExit end end object eTelefon: TEdit Left = 64 Top = 216 Width = 121 Height = 21 MaxLength = 18 TabOrder = 6 end object eFax: TEdit Left = 64 Top = 248 Width = 121 Height = 21 MaxLength = 18 TabOrder = 9 end object eNIP: TEdit Left = 400 Top = 152 Width = 121 Height = 21 TabOrder = 4 end object ePESEL: TEdit Left = 400 Top = 176 Width = 121 Height = 21 TabOrder = 5 end object eBank_naz: TEdit Left = 296 Top = 216 Width = 169 Height = 21 MaxLength = 30 TabOrder = 7 end object eBank_konto: TEdit Left = 296 Top = 248 Width = 169 Height = 21 MaxLength = 40 TabOrder = 8 end object cbVAT: TComboBox Left = 72 Top = 280 Width = 145 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 10 end object eUwagi: TEdit Left = 72 Top = 336 Width = 417 Height = 21 MaxLength = 30 TabOrder = 16 end object eCennik: TEdit Left = 336 Top = 288 Width = 121 Height = 21 ReadOnly = True TabOrder = 11 end object bCennik: TButton Left = 464 Top = 288 Width = 25 Height = 20 Caption = '...' TabOrder = 12 OnClick = bCennikClick end object ePlatnosc: TEdit Left = 72 Top = 312 Width = 145 Height = 21 ReadOnly = True TabOrder = 13 end object bPlatnosc: TButton Left = 224 Top = 314 Width = 25 Height = 20 Caption = '...' TabOrder = 14 OnClick = bPlatnoscClick end object eRabat: TEdit Left = 336 Top = 312 Width = 89 Height = 21 TabOrder = 15 end object bWyjdz: TButton Left = 224 Top = 424 Width = 75 Height = 25 Caption = '&Wyjd'#378 TabOrder = 21 OnClick = bWyjdzClick end object gbDowod: TGroupBox Left = 8 Top = 360 Width = 401 Height = 57 Caption = 'Dane rolnika' TabOrder = 18 object Label20: TLabel Left = 248 Top = 20 Width = 57 Height = 13 Caption = 'Wydany dn.' end object Label18: TLabel Left = 128 Top = 20 Width = 11 Height = 13 Caption = 'Nr' end object Label17: TLabel Left = 8 Top = 20 Width = 79 Height = 13 Caption = 'Dow. osob. seria' end object Label19: TLabel Left = 16 Top = 36 Width = 350 Height = 13 Caption = 'Miejsce wydania dowodu osobistego nale'#380'y wpisa'#263' w nazwie dodatko' + 'wej.' end object eDowod_data: TDateTimePicker Left = 311 Top = 12 Width = 82 Height = 21 CalAlignment = dtaLeft Date = 36857.877897314810000000 Time = 36857.877897314810000000 DateFormat = dfShort DateMode = dmComboBox Kind = dtkDate ParseInput = False TabOrder = 2 end object eDowod_numer: TEdit Left = 144 Top = 12 Width = 97 Height = 21 MaxLength = 7 TabOrder = 1 end object eDowod_seria: TEdit Left = 96 Top = 12 Width = 25 Height = 21 MaxLength = 2 TabOrder = 0 end end object cbDostawca: TCheckBox Left = 376 Top = 104 Width = 97 Height = 17 Caption = 'Dostawca' TabOrder = 19 end object cbOdbiorca: TCheckBox Left = 376 Top = 128 Width = 97 Height = 17 Caption = 'Odbiorca' TabOrder = 20 end object cbRolnik: TCheckBox Left = 432 Top = 368 Width = 97 Height = 17 Caption = 'Rolnik' TabOrder = 17 end object eSkrot: TEdit Left = 168 Top = 56 Width = 121 Height = 21 MaxLength = 12 TabOrder = 2 end object bRezygnuj: TBitBtn Left = 288 Top = 424 Width = 81 Height = 25 Caption = '&Rezygnuj' TabOrder = 22 OnClick = bRezygnujClick Glyph.Data = { DE010000424DDE01000000000000760000002800000024000000120000000100 0400000000006801000000000000000000001000000010000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 333333333333333333333333000033338833333333333333333F333333333333 0000333911833333983333333388F333333F3333000033391118333911833333 38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333 911118111118333338F3338F833338F3000033333911111111833333338F3338 3333F8330000333333911111183333333338F333333F83330000333333311111 8333333333338F3333383333000033333339111183333333333338F333833333 00003333339111118333333333333833338F3333000033333911181118333333 33338333338F333300003333911183911183333333383338F338F33300003333 9118333911183333338F33838F338F33000033333913333391113333338FF833 38F338F300003333333333333919333333388333338FFF830000333333333333 3333333333333333333888330000333333333333333333333333333333333333 0000} NumGlyphs = 2 end object bZapisz: TBitBtn Left = 160 Top = 424 Width = 75 Height = 25 Caption = '&Zapisz' TabOrder = 23 OnClick = bZapiszClick Glyph.Data = { DE010000424DDE01000000000000760000002800000024000000120000000100 0400000000006801000000000000000000001000000010000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333333330000333333333333333333333333F33333333333 00003333344333333333333333388F3333333333000033334224333333333333 338338F3333333330000333422224333333333333833338F3333333300003342 222224333333333383333338F3333333000034222A22224333333338F338F333 8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224 33333338F83338F338F33333000033A33333A222433333338333338F338F3333 0000333333333A222433333333333338F338F33300003333333333A222433333 333333338F338F33000033333333333A222433333333333338F338F300003333 33333333A222433333333333338F338F00003333333333333A22433333333333 3338F38F000033333333333333A223333333333333338F830000333333333333 333A333333333333333338330000333333333333333333333333333333333333 0000} NumGlyphs = 2 end object tFirma: TffTable DatabaseName = 'mr_sklep' FieldDefs = <> SessionName = '[automatic]' TableName = 'firma' Timeout = 10000 Left = 488 Top = 384 end object tKod_p: TffTable DatabaseName = 'mr_sklep' FieldDefs = <> SessionName = '[automatic]' TableName = 'kod_p' Timeout = 10000 Left = 448 Top = 384 end end